﻿Public Class U3Config

    Public Enum dPorts
        FIO0 = 0
        FIO1 = 1
        FIO2 = 2
        FIO3 = 3
        FIO4 = 4
        FIO5 = 5
        FIO6 = 6
        FIO7 = 7
        EIO0 = 8
        EIO1 = 9
        EIO2 = 10
        EIO3 = 11
        EIO4 = 12
        EIO5 = 13
        EIO6 = 14
        EIO7 = 15
        CIO0 = 16
        CIO1 = 17
        CIO2 = 18
        CIO3 = 19
    End Enum


    Private _DeviceID As Integer
    Public Property DeviceID() As Integer
        Get
            Return _DeviceID
        End Get
        Set(ByVal value As Integer)
            _DeviceID = value
        End Set
    End Property

    Private _PortID As dPorts
    Public Property PortID() As dPorts
        Get
            Return _PortID
        End Get
        Set(ByVal value As dPorts)
            _portID = value
        End Set
    End Property

    Private _PortType As String
    Public Property PortType() As String
        Get
            Return _PortType
        End Get
        Set(ByVal value As String)
            _PortType = value
        End Set
    End Property

    Private _Direction As String
    Public Property Direction() As String
        Get
            Return _Direction
        End Get
        Set(ByVal value As String)
            _Direction = value
        End Set
    End Property

    Private _DebounceCount As Byte
    Public Property DebounceCount() As Byte
        Get
            Return _DebounceCount
        End Get
        Set(ByVal value As Byte)
            _DebounceCount = value
        End Set
    End Property

    Private _SkipCount As Byte
    Public Property SkipCount() As Byte
        Get
            Return _SkipCount
        End Get
        Set(ByVal value As Byte)
            _SkipCount = value
        End Set
    End Property

    Private _Active As Boolean
    Public Property Active() As Boolean
        Get
            Return _Active
        End Get
        Set(ByVal value As Boolean)
            _Active = value
        End Set
    End Property

    Private _HSCode As String
    Public Property HSCode() As String
        Get
            Return _HSCode
        End Get
        Set(ByVal value As String)
            _HSCode = value
        End Set
    End Property

    Private _AlarmState As Boolean
    Public Property AlarmState() As Boolean
        Get
            Return _AlarmState
        End Get
        Set(ByVal value As Boolean)
            _AlarmState = value
        End Set
    End Property

    Private _AlarmAction As String
    Public Property AlarmAction() As String
        Get
            Return _AlarmAction
        End Get
        Set(ByVal value As String)
            _AlarmAction = value
        End Set
    End Property

    Private _SafeAction As String
    Public Property SafeAction() As String
        Get
            Return _SafeAction
        End Get
        Set(ByVal value As String)
            _SafeAction = value
        End Set
    End Property

    Private _AlarmScript As String
    Public Property AlarmScript() As String
        Get
            Return _AlarmScript
        End Get
        Set(ByVal value As String)
            _AlarmScript = value
        End Set
    End Property

    Private _SafeScript As String
    Public Property SafeScript() As String
        Get
            Return _SafeScript
        End Get
        Set(ByVal value As String)
            _SafeScript = value
        End Set
    End Property

    Private _AlarmDeviceAction As Byte
    Public Property AlarmDeviceAction() As Byte
        Get
            Return _AlarmDeviceAction
        End Get
        Set(ByVal value As Byte)
            _AlarmDeviceAction = value
        End Set
    End Property

    Private _SafeDeviceAction As Byte
    Public Property SafeDeviceAction() As Byte
        Get
            Return _SafeDeviceAction
        End Get
        Set(ByVal value As Byte)
            _SafeDeviceAction = value
        End Set
    End Property

    Private _AlarmLabel As String
    Public Property AlarmLabel() As String
        Get
            Return _AlarmLabel
        End Get
        Set(ByVal value As String)
            _AlarmLabel = value
        End Set
    End Property

    Private _SafeLabel As String
    Public Property SafeLabel() As String
        Get
            Return _SafeLabel
        End Get
        Set(ByVal value As String)
            _SafeLabel = value
        End Set
    End Property

    Private _UnknownLabel As String
    Public Property UnKnownLabel() As String
        Get
            Return _UnknownLabel
        End Get
        Set(ByVal value As String)
            _UnknownLabel = value
        End Set
    End Property

    Private _Description As String
    Public Property Description() As String
        Get
            Return _Description
        End Get
        Set(ByVal value As String)
            _Description = value
        End Set
    End Property

End Class
